home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-01
/
pdcurs21.zip
/
PRIVATE.ZIP
/
_GETFONT.C
< prev
next >
Wrap
Text File
|
1992-11-21
|
2KB
|
83 lines
#define CURSES_LIBRARY 1
#include <curses.h>
#ifndef NDEBUG
char *rcsid__getfont = "$Header: c:/curses/private/RCS/_getfont.c%v 2.0 1992/11/15 03:24:25 MH Rel $";
#endif
/*man-start*********************************************************************
PDC_get_font() - Get the current font size
PDCurses Description:
This is a private PDCurses routine.
This function returns the current font size. This function only
works if the #define FAST_VIDEO is true.
PDCurses Return Value:
This function returns OK on success and ERR on error.
PDCurses Errors:
An ERR will be returned if FAST_VIDEO is not true.
Portability:
PDCurses int PDC_get_font( void );
**man-end**********************************************************************/
int PDC_get_font(void)
{
#if defined (DOS) && defined (FAST_VIDEO)
int retval;
short far *POINTS;
POINTS = (short far *) 0x0485L;
retval = *POINTS;
if ((retval == 0) && (_cursvar.adapter == _MDS_GENIUS))
{
retval = _FONT15; /* Assume the MDS Genius is in 66 line mode. */
}
switch (_cursvar.adapter)
{
case _EGACOLOR:
case _EGAMONO:
switch (retval)
{
case _FONT8:
case _FONT14:
break;
default:
retval = _FONT14;
}
break;
case _VGACOLOR:
case _VGAMONO:
switch (retval)
{
case _FONT8:
case _FONT14:
case _FONT16:
break;
default:
break;
}
break;
default:
break;
}
return( retval );
#endif
#ifdef OS2
VIOMODEINFO modeInfo;
modeInfo.cb = sizeof(modeInfo);
/* set most parameters of modeInfo */
VioGetMode(&modeInfo, 0);
return ( modeInfo.vres / modeInfo.row);
#endif
}